set givTransitionLookupList to [5, 31, 27, 38, 32, 17, 8]
set givTopicList1 to ["QA0153", "QA0311", "QA0921", "QA2353", "QA2374"]
set givTopicList2 to ["QA0045", "QA0922", "QA0974", "QA1491", "QA1493", "QA2023", "QA2231"]
set givTopicList3 to ["QA0973", "QA2233", "QA2264"]
set givTopicList4 to ["QA0044", "QA0313", "QA0924", "QA0971", "QA0972", "QA0975", "QA1495", "QA1782", "QA1783", "QA2022", "QA2234", "QA2372", "QA2873"]
set givTopicList5 to ["QA0041", "QA2232", "QA2364", "QA2371"]
set givTopicList6 to ["QA0151", "QA2261", "QA2875"]
set givTopicList7 to ["QA0152", "QA0312", "QA1781", "QA2235", "QA2262", "QA2263", "QA2351", "QA2352", "QA2354", "QA2373", "QA2872"]
set givTopicList8 to ["QA0042", "QA0155", "QA2362"]
set givTopicList9 to ["QA0043", "QA1494", "QA2363", "QA2874"]
set givTopics to [givTopicList1, givTopicList2, givTopicList3, givTopicList4, givTopicList5, givTopicList6, givTopicList7, givTopicList8, givTopicList9]
set iarrow1 to "93, 326, 126, 336, 109, 331"
set iarrow2 to "93, 214, 126, 224, 109, 219"
set iarrow3 to "93, 102, 126, 112, 109, 107"
set iarrow4 to "420, 102, 453, 112, 436, 107"
set iarrow5 to "586, 102, 619, 112, 602, 107"
set iarrow6 to "257, 102, 290, 112, 273, 107"
set darrow1 to "25, 326, 56, 335, 41, 331"
set darrow2 to "25, 214, 56, 223, 41, 219"
set darrow3 to "25, 102, 56, 111, 41, 107"
set darrow4 to "353, 102, 384, 111, 369, 107"
set darrow5 to "519, 102, 550, 111, 535, 107"
set darrow6 to "189, 102, 220, 111, 205, 107"
set givArrowRectList to [darrow1, darrow2, darrow3, darrow4, darrow5, darrow6, iarrow1, iarrow2, iarrow3, iarrow4, iarrow5, iarrow6]
set givFullPath to 1
set givDebug to 0
set givSolo to 0
set givFrameScript to "RolloverCheck"
set givTextRegColor to 255
set givTextHiliteColor to 254
set givTextHiliteBlue to 251
set givTextFont to "Helvetica"
set givAnimEnable to value(HSStateGet("opt", "CRAnim"))
set givLastClipPlayed to "XXX"
set givMAINMONITORSPRITE to 3
puppetSprite(givMAINMONITORSPRITE, 1)
set givSOUNDINDICATORSPRITE to 4
puppetSprite(givSOUNDINDICATORSPRITE, 1)
set the cursor of sprite givSOUNDINDICATORSPRITE to [the number of cast "HAND_CURSOR", the number of cast "HAND_MASK"]
set givATHLETESELECTSPRITE to 5
puppetSprite(givATHLETESELECTSPRITE, 1)
set the castNum of sprite givATHLETESELECTSPRITE to the number of cast "AthleteSelect"
set the visible of sprite givATHLETESELECTSPRITE to 1
set givTOPICSELECTSPRITE to 6
puppetSprite(givTOPICSELECTSPRITE, 1)
set the castNum of sprite givTOPICSELECTSPRITE to the number of cast "TopicSelect"
set the visible of sprite givTOPICSELECTSPRITE to 1
set givLOADSPRITE to 7
puppetSprite(givLOADSPRITE, 1)
set givCONTROLPANELSPRITE to 8
puppetSprite(givCONTROLPANELSPRITE, 1)
repeat with I = givCONTROLPANELSPRITE + 1 to givCONTROLPANELSPRITE + 11
puppetSprite(I, 1)
end repeat
set givMONITORINDICATORSPRITE to 20
puppetSprite(givMONITORINDICATORSPRITE, 1)
set givQUESTIONTEXTBACKSPRITE to 21
puppetSprite(givQUESTIONTEXTBACKSPRITE, 1)
set givROLLCREDITSMASKSPRITE to 31
set givBASEMONITORSPRITE to 32
repeat with I = givBASEMONITORSPRITE + 1 to givBASEMONITORSPRITE + 6
puppetSprite(I, 1)
end repeat
set givARROWSPRITE to 39
puppetSprite(givARROWSPRITE, 1)
set the castNum of sprite givARROWSPRITE to the number of cast "nullcast"
set the locV of sprite givARROWSPRITE to -100
set givEDITTEXTBOXSPRITE to 41
set the visible of sprite givEDITTEXTBOXSPRITE to 0
set givSELECTALLSPRITE to 42
puppetSprite(givSELECTALLSPRITE, 1)
set the visible of sprite givSELECTALLSPRITE to 1
set givSELECTNONESPRITE to 43
puppetSprite(givSELECTNONESPRITE, 1)
set the visible of sprite givSELECTNONESPRITE to 1
set givMONITORDIALSPRITE to 44
puppetSprite(givMONITORDIALSPRITE, 1)
set the cursor of sprite givMONITORDIALSPRITE to [the number of cast "HAND_CURSOR", the number of cast "HAND_MASK"]
set givMODESWITCHSPRITE to 23
puppetSprite(givMODESWITCHSPRITE, 1)
set the cursor of sprite givMODESWITCHSPRITE to [the number of cast "HAND_CURSOR", the number of cast "HAND_MASK"]
set givSELECTBACKSPRITE to 45
puppetSprite(givSELECTBACKSPRITE, 1)
set the visible of sprite givSELECTBACKSPRITE to 0
set the castNum of sprite givSELECTBACKSPRITE to the number of cast "nullcast"
set givSELECTFORESPRITE to 48
puppetSprite(givSELECTFORESPRITE, 1)
set the castNum of sprite givSELECTFORESPRITE to the number of cast "wait background"
set the visible of sprite givSELECTFORESPRITE to 1
set givLastRollover to 0
set givCurrArrow to 0
set givLastIndexLine to 0
set givCurrIndexLine to 0
set givEditListPlayFlag to 0
set givCreditsCleanupFlag to 0
set givRollCreditsCleanupFlag to 0
set givSelectCleanupFlag to 0
set givTrollCleanupFlag to 0
set givMainMonitorRefreshFlag to 0
set givTransitionTestCleanupFlag to 0
set givTransTest to 0
set givTransTestPtr to 0
if givSolo = 1 then
set gSISystem to "MAC"
set gSIUserName to "Fearless Fred"
end if
end
on InitState
global gSIlinkinfo, givState
MessagePut("init the state object")
set givState to EMPTY
if voidp(gSIlinkinfo) or (gSIlinkinfo = EMPTY) then
nothing()
else
MessagePut("some athlete value has been passed..." && gSIlinkinfo)
set tempState to birth(script "State Parent Script")
if not objectp(tempState) then
MessagePut("error creating state object")
end if
set givState to SetStateFromValue(tempState, gSIlinkinfo)
set gSIlinkinfo to EMPTY
end if
if not objectp(givState) then
MessagePut("givState not an object, so make it one...")
set tempState to birth(script "State Parent Script")
if not objectp(tempState) then
MessagePut("error creating state object")
end if
set givState to RetrieveStateFromHistory(tempState)
end if
end
on InitMode
global givState, givMODESWITCHSPRITE
puppetSprite(givMODESWITCHSPRITE, 1)
MessagePut("init mode")
SetMode(the mode of givState, 1, "skip")
end
on InitActiveMonitor
global givState, givMONITORDIALSPRITE
puppetSprite(givMONITORDIALSPRITE, 1)
MessagePut("init active monitor...")
SetActiveMonitor(the activeMonitor of givState, 1, 1)
set the castNum of sprite givMONITORDIALSPRITE to the number of cast "BaseMonitorDialCast" + 1
end
on InitAthlete
MessagePut("init athlete...")
end
on InitMonitors
global givBASEMONITORSPRITE, givMONITORDIALINDICATORSPRITE, givTextRegColor
MessagePut("init monitors...")
repeat with I = givBASEMONITORSPRITE + 1 to givBASEMONITORSPRITE + 6
puppetSprite(I, 1)
end repeat
puppetSprite(givMONITORDIALINDICATORSPRITE, 1)
DisplayMonitor(1)
DisplayMonitor(4)
DisplayMonitor(6)
end
on InitQuestionTextBox
global givState, givQUESTIONTEXTBACKSPRITE
MessagePut("init question text box")
SetQuestionTextBox(0)
QuestionListSelectAll()
end
on InitEditTextBox
DisplayEditTextBox()
end
on InitSound
global givState, givSOUNDINDICATORSPRITE
MessagePut("init sound...")
puppetSprite(givSOUNDINDICATORSPRITE, 1)
SetSoundCast(the sound of givState)
end
on InitDV
global givState, givMAINMONITORSPRITE, gSIVideoPath, gSIEventQ, gSIFlush
MessagePut("init digital video...")
DVUse(gSIVideoPath & "FULL")
DVHide()
DVSetPlayArea(the left of sprite givMAINMONITORSPRITE, the top of sprite givMAINMONITORSPRITE, the width of sprite givMAINMONITORSPRITE, the height of sprite givMAINMONITORSPRITE)
EndBufferingEvents()
if the activeVideoID of givState = EMPTY then
set the activeVideoMode of givState to #none
else
set the activeVideoMode of givState to #stop
end if
end
on InitDialogs
global givMyDialog
if objectp(givMyDialog) then
givMyDialog(mdispose)
end if
set givMyDialog to dialogs(mnew)
if not objectp(givMyDialog) then
MessagePut("error creating dialog object!")
end if
end
on InitDone
global givSELECTFORESPRITE, givState, gSIUserName
set the visible of sprite givSELECTFORESPRITE to 0
set the castNum of sprite givSELECTFORESPRITE to the number of cast "nullcast"
RefreshMainMonitor()
end
on cleanUp
global givSELECTFORESPRITE, givState, gSISystem, gSIEventQ, gSIFlush, givMyDialog, gSIXSuffix, gSIlinkinfo
MessagePut("movie done, return to whatever called it")
set the visible of sprite givSELECTFORESPRITE to 1
set the castNum of sprite givSELECTFORESPRITE to the number of cast "black background"
